home *** CD-ROM | disk | FTP | other *** search
/ By Popular Request 2.0 / By Popular Request 2.0 (Arsenal Computer).ISO / amiga_2 / cnttlkt2.lha / Routines / DUMPUSER < prev    next >
Text File  |  1994-12-13  |  232b  |  4 lines
  1. DUMPUSER:procedure;arg p,d,q;if q~=1 then q=0
  2.   getportid p;if result=-1|~datatype(p,'W')|~datatype(d,'W')|d<0|d>11 then return 0
  3.   address ('CNETREXX'p);sendstring 'L1109799 #'q'}L1200022 #'d'}L1109807 #1}';addkeys '`';return 1
  4.